home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 April: Mac OS SDK / Dev.CD Apr 96 SDK / Dev.CD Apr 96 SDK2.toast / Development Kits (Disc 2) / ScriptX / Draggable ScriptX Folders / utils / DTK / source / DTK_SX / debug.sx < prev    next >
Encoding:
Text File  |  1995-11-22  |  1.5 KB  |  59 lines  |  [TEXT/ttxt]
  1. --<<<
  2. module DTK
  3.     uses ScriptX
  4.     
  5.     exports DTKCastTranslator
  6.         exports instance variables
  7.             outputStream,            -- Where author wants data to go
  8.             container,                -- The Container to save to
  9.             dtk                        -- The DTK running this translator
  10.  
  11.     exports DTKScoreTranslator
  12.         exports instance variables
  13.             outputStream,            -- Where author wants data to go
  14.             container,                -- The Container to save to
  15.             dtk,                    -- The DTK running this translator
  16.             castList                -- The list of converted cast members
  17.  
  18.     exports DTKCastMemberToPresenter
  19.         exports instance variables
  20.             patternCache,
  21.             shapeClass,
  22.             bitmapClass,
  23.             textClass,
  24.             videoClass
  25.             
  26.     exports DTKCastMemberToStencil
  27.     exports DTKCastMemberToAudioStream
  28.     
  29. end
  30. module DTKAssemble
  31.     uses scriptX, DTK
  32. end
  33. in module DTKAssemble
  34.  
  35. (
  36.     local ld       := new loader
  37.     local devgroup := getgroup ld "dtk"
  38.     local devunit  := getLoadableUnit devgroup "directordriver"
  39.     local devid    := loadmodule ld devgroup devunit
  40.     print (loaderValue ld devid)
  41.     
  42.     local devunit2  := getLoadableUnit devgroup "dtk"
  43.     local devid2    := loadmodule ld devgroup devunit2
  44.     print (loaderValue ld devid2)
  45. )
  46.  
  47. global dtktc
  48.  
  49. global sourceDir := spawn theStartDir "DTK.sx"
  50. global dtkModule := GetModule @DTK
  51.  
  52. --fileIn sourceDir name:"casttran.sx" module:dtkModule
  53. --fileIn sourceDir name:"caststen.sx" module:dtkModule
  54. --fileIn sourceDir name:"castpres.sx" module:dtkModule
  55. --fileIn sourceDir name:"castaud.sx" module:dtkModule
  56. --
  57. --fileIn sourceDir name:"scortran.sx" module:dtkModule
  58. -->>>
  59.